home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 September (IDG) / Sep99.iso / Shareware World / Comms & Internet / LinkConverter 1.1.2 / Dialog Director v0.7 / Examples / Progress 1.as < prev    next >
Encoding:
Text File  |  1998-01-12  |  352 b   |  11 lines  |  [TEXT/ToyS]
  1. property theMax : 1234
  2. dd install with grayscale
  3. set p to dd make dialog {size:[300, 50], contents:[¬
  4.     {class:static text, contents:"Thinking…", bounds:[8, 4, 160, 20]}, ¬
  5.     {class:gauge, bounds:[10, 25, 290, 25 + 12], value:0, max value:theMax} ¬
  6.         ]}
  7. repeat with n from 1 to theMax
  8.     dd set value of item 2 of p to n
  9. end repeat
  10. dd delete p
  11. dd uninstall